local
local
local
integer
integer
integer
loop
StringLength
loop
exitwhen
SubString
StringLength
set
else
set
endif
endloop
set
loop
exitwhen
SubString
StringLength
set
else
set
endif
endloop
set
loop
exitwhen
SubString
StringLength
set
else
set
endif
endloop
set
set
endloop
return
